home *** CD-ROM | disk | FTP | other *** search
- // Borland C++ Builder
- // Copyright (c) 1995, 1998 by Borland International
- // All rights reserved
-
- // (DO NOT EDIT: machine generated header) 'AHMTDigital.pas' rev: 3.00
-
- #ifndef AHMTDigitalHPP
- #define AHMTDigitalHPP
- #include <AHMFreeware.hpp>
- #include <Graphics.hpp>
- #include <Controls.hpp>
- #include <Classes.hpp>
- #include <SysUtils.hpp>
- #include <Messages.hpp>
- #include <Windows.hpp>
- #include <SysInit.hpp>
- #include <System.hpp>
-
- //-- user supplied -----------------------------------------------------------
-
- namespace Ahmtdigital
- {
- //-- type declarations -------------------------------------------------------
- class DELPHICLASS TAHMDigital;
- class PASCALIMPLEMENTATION TAHMDigital : public Controls::TGraphicControl
- {
- typedef Controls::TGraphicControl inherited;
-
- private:
- Ahmfreeware::TAHMAboutFreeStr FAbout;
- int fi;
- Graphics::TColor fdon;
- Graphics::TColor fdoff;
- Graphics::TColor fback;
- Classes::TNotifyEvent fonn;
- bool fborder;
- System::AnsiString ostr;
- void __fastcall setfi(int value);
- void __fastcall Setfdon(Graphics::TColor value);
- void __fastcall Setfdoff(Graphics::TColor value);
- void __fastcall Setback(Graphics::TColor value);
- void __fastcall SetBorder(bool value);
-
- protected:
- virtual void __fastcall Paint(void);
-
- public:
- __fastcall virtual TAHMDigital(Classes::TComponent* AOwner);
- __fastcall virtual ~TAHMDigital(void);
-
- __published:
- __property Ahmfreeware::TAHMAboutFreeStr About = {read=FAbout, write=FAbout};
- __property OnClick ;
- __property OnDblClick ;
- __property Visible ;
- __property int Number = {read=fi, write=setfi, nodefault};
- __property Graphics::TColor DigitOnColor = {read=fdon, write=Setfdon, nodefault};
- __property Graphics::TColor DigitShadow = {read=fdoff, write=Setfdoff, nodefault};
- __property Graphics::TColor DigitBackground = {read=fback, write=Setback, nodefault};
- __property bool Border3D = {read=fborder, write=SetBorder, nodefault};
- __property Classes::TNotifyEvent OnNewNumber = {read=fonn, write=fonn};
- };
-
- //-- var, const, procedure ---------------------------------------------------
-
- } /* namespace Ahmtdigital */
- #if !defined(NO_IMPLICIT_NAMESPACE_USE)
- using namespace Ahmtdigital;
- #endif
- //-- end unit ----------------------------------------------------------------
- #endif // AHMTDigital
-